#!/usr/bin/env perl

use utf8;

print "Input a string >";

$first = <STDIN>;

print "Input a number >";

chomp($second = <STDIN>);

$multi = $first x $second;

print $multi;
